Código fuente de 'Comprueba versiones.asp'


<%@ language=vbscript%>
<html>
<head>
<title>Comprueba versiones - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>



<script language=jscript runat=server>
response.write("<p align='center'><b>")
response.write ("<font size='3'>Comprueba versiones</font></b></p>")
response.write ("<body style='font-family: Arial; font-size: 9pt'>");	
response.write ("<br>");
 response.write ("scripting engine=<b>" + ScriptEngine() + "</b><br>");
 response.write ("buildversion=<b>" + ScriptEngineBuildVersion() + "</b><br>");
 response.write ("majorversion=<b>" + ScriptEngineMajorVersion() + "</b><br>");
 response.write ("minorversion=<b>" + ScriptEngineMinorVersion() + "</b><br>");
 </script>

<% 'Código ASP

 response.write "<hr><br>"
 response.write "scripting engine=<b>" & scriptengine() & "</b><br>"
 response.write "buildversion=<b>" & scriptenginebuildversion() & "</b><br>"
 response.write "majorversion=<b>" & scriptenginemajorversion() & "</b><br>"
 response.write "minorversion=<b>" & scriptengineminorversion() & "</b><br>"

 response.write "<hr><br>"
 set tempconn=server.createobject("adodb.connection")
 response.write "ado version=<b>"
 response.write tempconn.version & "</b><br>"
 set tempconn=nothing

 response.write "<hr><br>"
 serversoftware=request.servervariables("server_software")
 response.write "server software=<b>"
 response.write serversoftware & "</b><br>"

 Response.Write "Script Timeout = <b>" & Server.ScriptTimeout & " seconds</b><br>"
 Response.Write "Session Timeout = <b>" & Session.Timeout & " minutes</b><br>"

 'Fin código ASP %>
 
 </BODY></HTML>